home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ShareWare OnLine 2
/
ShareWare OnLine Volume 2 (CMS Software)(1993).iso
/
os2
/
pp001.zip
/
SAMPLE.PRG
< prev
Wrap
Text File
|
1993-04-22
|
279b
|
17 lines
Program Sample1;
{
Sample program to show off KISS15 - a simple compiler for Pascal/2
}
var
a,b : integer;
begin
WriteLn('Sample program to demonstrate Power Pascal');
Write('Sample ASCII String: ');
for a := 65 to 90 do
Emit(A);
WriteLn;
end.